Imports Aricie.DNN.Security.Trial


Namespace Aricie.DNN.Caching
    Public Class TrialProvider
        Implements ITrialProvider

#If TRIAL Then
        Private Const IS_TRIAL As Boolean = True
#Else
        Private Const IS_TRIAL As Boolean = False
#End If
        Private Const ENCRYPTION_KEY As String = "CachingCloud"
        Private Const DURATION As Integer = 30


        Public Function GetTrialConfigInfo() As TrialConfigInfo Implements ITrialProvider.GetTrialConfigInfo
            Return New TrialConfigInfo(IS_TRIAL _
                                       , DistributedCachingBusinessController.MODULE_NAME _
                                       , TrialLimitation.Expiration Or TrialLimitation.ExplainView _
                                       , ENCRYPTION_KEY _
                                       , DURATION)

        End Function
    End Class
End Namespace
